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FIG. 2 

<Cardl_ayoutStyle Name=name. . .> 

<Options size=card_size. . .>. . .</Options> 

<BackgroundList> 
<Background name=name Func=function_ name> 
<object properety=. . .></> 

<Background> 

<Background name=name Func=function_name> 
<object property*. . .></> 

<Background> 

</BackgroundList>. . . 
<ForegroundList> 
<Foreground name=name Func=function_name> 
<object property*. . .></> 

</Foreground> 

<Foreground name=name Func=function_name> 
<object property*. . .></> 

<Foreground> 
<ForegroundList> 

<CardSeq name=name Context=context Type= type Content=content> 

<Background Sty leRef background. name> 
<CardSeq> 

<CardSeq name=name Context=context Type-type Content=content> 

<Background StyleRef=background_name> 
</CardSeq> 

<Card name=name Context=context Type=type Content*content> 

<Foreground StyleRef=background.name></> 
</Card> 

0 <Card name=name Context=context Type=type Content=content> 
foreground StyleRef=background_name></> 
</Card> 

<CardLayoutStyle> 
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FIG. 3 

<CardLayoutStyle Name = name. . .> 

<Options size=card_size. . .>. . .</Options> 

<BackgroundList> 

<Background name=name Func=function_name> 
<object property=. . .></> 

</Background> 

<Background name=name Func=function.name> 
<object property^. . .></> 

</Background> 

</BackgroundList>. . . 
<ForegroundList> 

<Forground name="TextByGf xForeground" Func="TextByGfxForeground"> 
<0bject Name="TextBy6fxTitle" 

Coords="lB0. 1395. 1150. 1305" 

Type="Field° 

Func-*TitleText" 

Context="Card, CardX. CardTitle" 

FontSize="15" 

FontStyle="Bold" 

FontColor="blue" 

Content="CardTitle"></> 

<0bject Name="GfxContent" 

Coords-"357 94 881 693" 

Type="Graphics" 

Func="GfxContent" 

Context="Card . CardX , AnyDocX , Figure, Graphic" 
Content="Graphic" 

AIU="Card. CardX. AnyDocX, Figure, AIUDoc.R0r></> 
</Foreground> 
</ForegroundList> 

<CardSeq name="TextByGfxSeq Type=°TextByGfx" 

Context="PlantLevel .CardSeq" Content*" "> 
<Background StyleRef ="NormalBackground"> 
</CardSeq> 

<Card name="TextByGfxCard" Type="TextByGfx" 

Context="PlantLevel, CardSeq, Card"Content=""> 
foreground StyleRef ="TextByGfxForeground°></> 
</Card> 

<CardLayoutStyle> 
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FIG. 4 

<MACRO_Declaration> 
<ObjectGroup name^project.resource'^ 
MACRO.Resource (sty lename ( type, filename) </> 
MACRO_Resource(stylename, type, filename) </> 

</ObjectGroup> 

MACRO.namelstylename, parameters) </> 
MACRO.namelstylename, parameters) </> 

</MACRO_Declaration> 
<ContentMapping> 
<ElementRule Context=doc_tags> 

<Def ineVar name=. . .> 

<Def ineVar name=. . .> 

<CaseExpr key=. . .> 
<CaseClause matchvalue=. . .> 
<AddObject otype= . . .stylename= . . .> 
<ProcessGrove command^. . .></> 

<AddGroup groupname=. . .></> 

</AddObject> 
</CaseClause> 

<CaseClause matchvalue=. . .> 
<AddObject otype=. . .stylename=. . .> 
<ProcessGrove commands . .></> 

<AddGroup groupname=. . .></> 

</AddObject> 
</CaseClause> 
</CaseExpr> 
</ElementRule> 

<ElementRule. . .>.'. .</> 
</ContentMapping> 
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FIG. 5 



<MACRO_Declaration> 

MACRO.TitleFieldlTextByGfxTitle. "180. 1395, 1150, 1305, B $CardTitle.RTF$, 15", "bold", "blue") 

</MACRO_Declaration> 
<ContentMapping> 

<ElementRule context*" (Card CardX)"> 
<ProcessGrove 

command="process-matching-children CardTi t le"> 

<ProcessGrove 

command="process-matching-children ANYD0CX"> 

</ElementRule> 

<ElementRule context= (Card CardX CardTitle) "> 

<Def ineVar name= J $CardTitle_RTF"forvalue= n (RTF-TitleGen(current node) ) "></> 

<CaseExpr key=" (CardType(current-node)) "> 
<CaseClause matchvalue="GfxonlyCard"> 
<AddObject otype="Field u sty lename= "Gf xOnlyTitle w ></> 
</CaseClause> 

<CaseClause matchvalue="TextByGfxtitle"> 

<AddOb ject otype="Field" stylename="TextByGfxTitle"></> 
</CaseClause> 

<CaseClause matchvalue= <, else"> 

<AddObject otype="Field" stylenamG="TextByGf xTi tle"></> 

</CaseClause> 
</CaseExpr> 

</ElementRule> 
<ElementRulk>. . .</> 

</ContentMapping> 
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FIG. 6 
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FIG. 7 



<DisplaySchema Ob jectype= "Field" Name="TextByGfxTitle"> 
<Argument name="StyleName" type="Required" 

AvailVule="#ANY.UNIQUE_NAME"> 
<Argument name="vertices" type="Required" 

Availalue="#ANY_2P0INTS"> 
<Argument name="TitleRTF" type="Optional" 

DefaultValuG=$CAROTitle_RTF$"> 
<Argument name="FontSize" type="Optional" 

DefaultValue="15°AvailValue=°#Number"> 
<Argument name="Fontstyle" type="Optional" 

DefaultValue="Regular"AvailValue="Bold,Regular.Italic"> 
<Argument name =" Font Co lor" type="Optional u 

DefaultValue="Black"AvailValue="#Any_Color_Name or RGB Stroke"> 
</DisplaySchema> 



FIG. 8 



<DisplaySchema Objective=object_type Name=macro_name or varaiable_name> 
<Argument name=. . .type*. . . 

Def aultValue= . . .Avai lValue= . . .> 
<Argument name=. . .type*. . . 

Defaul tValue= . . .AvailValue=. . .> 
<Argument name=. . .type=. . . 

Defaul tValue= . . .AvailValue=. . .> 

</DisplaySchema> 
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FIG. 3 



<DisplaySchema Ob jectype= p Def ineVar" Name="$CardTitle_RTF$"> 
<Argument name="RTF-Gen° type= "Required" 
AvailValue="#ANY-DSSSL-FUNC-NANME"> 
<Argument name="context" type="Optional" 
DefauUValue=" (Card Title) °> 
</DefaultSchema> 



FIG. 10 



<DisplaySchema Objective="Resource"MacroName="MACRO_Resource"> 
<Argument name="Format" type="Optional" 

DefaultValue=" icon" AvailValue=" icon. bitmap .sharedscript .menubar"> 
<Argument name="StyleName" type=°Required" 

A va i 1 Vu 1 e = " #ANY_UNIQUE .NAME " > 
<Argument name="InstanceNAme" type="Optional" 

DefaultValue=""AvailValue="#ANY_STRING"> 
<Argument name="FileName" type="Required" 

AvailValue="#ANY_STRINGr"> 
</OisplaySchema> 
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FIG. 11 

CardManual [R Node] 

PlantLevel [T Node] 

I 

CardSeq [CT node] Type:GfxOnly.TextByGfx 
Card [CT node] Type : GfxOnly . TextByGfx 



CardX [T node] 




AnyDocX [CT node] CardTitle [C node] 

/ 

Figure [T node] 
AIUDoc [T node] Graphic [C node] 

/ 

ROI [A node] 



FIG. 12 



1. CardManual. PlantLevel, CardSeq 

2. CardManual, PlantLevel. CardSeq, Card 

3. CardManual. PlantLevel. CardSeq, Card. CardX. CardTitle 

4. CardManual. PlantLevel, CardSeq, Card. CardX. AnyDocX 

5. CardManual, PlantLevel. CardSeq, Card, CardX, AnyDocX, Figure, Graphic 

6. CardManual. PlantLevel. CardSeq, Card, CardX, AnyDocX, Figure. AIUDoc. ROI 



FIG. 13 
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FIG. 14 



(A) Transition Node: CardX 
<ElementRule context^ (Card CardX) "> 

<ProcessGrove 
command= u process-matching-children CARDTITLE"></> 

<ProcessGrove 

coinmand="process-niatching-children ANYD0CX M ></> 
<ElementRule> 

(B) Content Node: CardTitle (See Figure 5) 

(0 Content Transition Node: CardSeq 
<ElementRule context= a (Plantl_evel CardSeq) "> 

<Def ineVar name= u $Page_currentObject$" 

strValue=" (currentOb jectGen (current-node) ) "> </> 
<Def ineVar . . .> </> 

<CaseExpr key=" (cardSeqType (current-node) ) "> 
<CaseClause matchval="GfxOnly n > 

<AddObject otype=Background styleName="GfxOnlyBackground"> 
<ProcessGrove 
command= B process-matching-children CARD"></> 

</AddObject> 
</CaseClause> 

<CaseClause matchval= B TextByGfx u > 
<AddObject otype=Background styleName= u NormalBackground ,, > 
<AddObject otype=Button styleName="Top ,, ></> 
<AddObject otype=Button styleName="First"></> 
<AddObject otype=Button styleName= B Previous ,, ></> 
<AddObject otype=Button styleName= I, Next"></> 
<AddObject otype=Button styleName=°Last u ></> 
<AddObject otype^Button styleName="Audio 0 ></> 
<AddObject otype=Button styleName= ,, Animate"></> 

<ProcessGrove 

command="process-matching-children CARD w ></> 
</CaseClause> 

</CaseClause matchval='else B > 

</CaseClause> 

</CaseExpr> 
</ElementRule> 
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FIG. 15 



(D) ROOT NODE: CardManual 

<ElementRule context="CardManual B > 
<AddOb ject otype=CardManualLayout styleName= Mrt > 

<DefineVar name="$BookTOC$ u strValue=" (TOC-Gen (current-node) ) H > </> 
<AddObject otype=ToolBookManual s ty leName^ " IMIS.ToolBook "> 
<AddGroup groupName="Pro ject .Resources'^ </> 

<AddObject otype=MainViewer styleName='MainViewer'> 
<ProcessGrove 

command="process-matching-children PLANTLEVEL"></> 
<AddGroup groupName= M IMIS_MiscViewersContent M > </> 
</AddObject> 

<AddGroup groupName="IMIS.MiscViewers"> </> 
</AddObject> 
</AddObject> 
</ElementRule> 

(E) Associated Node: ROI 

<ElementRule context-" (Card CardX AnyDocX Figure AIUDoc ROI) "> 
<Def ineVar name= i, $AiyName$ ,, 

strValue=°(getattr NAME (current-node) ) "> </> 

<CaseExpr key=° (cardtype (current-node) )"> 

<CaseClause matchval="Gf xOnly "> . . .</CaseClause> 
<CaseClause matchval s "TextByGfx B > 
<CaseExpr key=" (ROI-TYPE (current-node)) "> 
<CaseClause matchval="polygon"> 

<AddObject otype=Polygon styleName= - GfxContent-AIU-Poly"></> 
</> 

<CaseClause matchval="callouf> ..</> 
<CaseClause matchval= n NameCallout M > ..</> 

</CaseExpr> 
</CaseClause> 

<CaseClause matchval= M else B > 

<EmptySosofo> 
</CaseClause> 

</CaseExpr> 
</ElementRule> 
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FIG. IB 
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FIG. 17 



(element (Card CardX CardTitle) 
(sosofo-append 

(makeFODfo FOtype: "Def ineVar" 

FOname: "$CardTitle_RTF$" 
FOinstruction: (RTF-TitleGen(current Node) ) ) 
(case(cardType(current Node))) 
(("GfxOnly") 

(makeFODfo Fotype: "StartTag" 
FOname: "Field" 

FOinstruction: (AttributeGen GfxOnlyTitle) ) ) 

(("TextByGfx") 
(makeFODfo FOtype: "StartTag" 
FOname: "Field" 

FOinstruction: (AttibuteGen TextByGf xTitle) ) ) 

(else 

(makeFODfo FOtype: "StartTag" 
FOname: "Field" 

FOinstruction: (AttributeGen TextByGf xTitle) ) ) 

) 
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FIG. 18 



(define (AttributeGen type) 
(case type 
(("TextByGfxTitle") 
(string-append 

" FontSize="\15\" " 

" FontStyle= "\bold\" " 

" FontColor="\0.0.255\" " 

" RGBFILL=\"255,255.255\" " 

" TRANSPARENT=\°true\" " 

" VERTICES=\"180. 1395. 1150. 1305\" " 

" RICHTEXT=\"$CardTitle RTF$\" " 

' F0NTFACE=\" Times New Roman\" " 

" ACTIVATED=\"true\" " 

" BASELINES=\"false\" " 

" BORDERSTYLE= \ " no ne \ " " 

" FIELDTYPE=\"wordWrap\" " 

" SCR0LL=\"0\" " 

" SPACING=\"1\" * 

* INDENTS=\"0.0.0\" " 

" TABSPACING=\"3G0\" " 

* TABTYPE=\"left\" " 

0 TEXTALIGNMENT = \ " 1 e f t \ " " 
" NAME=\"TitleField\"")) 
(("GfxOnlyTitle") 
...) 



(define (makeFODfo # ; key FOtype FOname FOinstruction) 
(case FOtype 
(("StartTag") 
(make FOD-Instruction 

data: (string-append "<" FOname FOinstruction "> "</>" ))) 
( ("DefineVar") 
(make FOD-Instruction 

data: (string-append "<Def ineVar name="FOname °value=" FOinstruction ">"))) 
(("EndTag") 

(make FOD-instruction 

data: (string-append "</>"))) 

(else 

(make FOD-instruction 

data: (string-append "newFlowObjecttype")) ) 
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<Resource property=. . .>. . .</Resource> 
<Resource property= ...>.. .</Resource> 



<MainViewer property=. . > 
<StartBkgnd property=. . .> 
<Object property=. . .> 



<StartPage property=. . .>. . .</StartPage> 



<NextPage property=. . .> 

<Field Name="TitleField u 
TextAl ignment=" lef t " 
TabType="lefr 
TabSpacing="360" 
Scroll="0" 

FieldType* 1 ' wordwrap" 
BorderStyle^none" 
BaseLines'false" 
Act ivated=" true"> 
Fontface="Time New Roman" 
Vertice= w 180. 1395. 1150. 1305" 
Transparent^True" 
RichText= 

■ (\rtf l\anai \def f 5\def tab3B0\def langl033 
(\fonttbl 

(\f l\f roman\f charset2\f prg2 Symbol;) 
(\f2\f tech Marlett : ) 

(\f 4\froman\f charsetOXf prg2 Times New Roman-,) 

(\f 5\f swiss\f charsetO\f prg2 Arial ; ) 

(\f 10\fswiss\fcharset0\f prg2 System;)) 

(\colorthli\red0\green0\blue0.\red0\green0\blue255; 

\red255\green0\blue0 ; \red255\green255\blue255;) 

\pard\plain \f4\fs20 (\b\i\f5\fs3B\ofl co2 Purge System 1) 



RGBFil 1- "255 . 255 . 255" 
fontsize="15" 
fontStyle= M bold" 
rgbStroke-"0.0.255 B 



</NextPage> 

<NextPage property= ...>.. .</NextPage> 
</StartBknd> 

<NextBkgnd property*. . .>. . .</NextBgrnd> 
-<MainViewer> 

<Viewer property=. . .>. . .</Viewer> 
/CardFormattingBook> 



> 
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FIG. 20 

<CardFormattingBook property*. . .> 
<Resource property=. . .>. . .</Resource> 
<Resource property* ...>.. .</Resource> 

<MainViewer property*. . .> 
<StartBkgrnd property*. . .> 
<0bject property*. . .> 

<StartPage property*. . .> 
<0bject property*. . .> 

</StartPage> 
<NextPage property*. . .> 
<0bject Property*. . .> 

</NextPage> 

<NextPage property*. . .> 
<0bject property*. . .> 

</NextPage> 

</StartBkgnd> 

<NextBkgnd property*. . .>. . .</NextBkgnd> 
</MainViewer> 

<Viewer property*. . .>. . .</Viewer> 
<Viewer property*. . .>. . .</Viewer> 

</CardFormattingBook> 



